Imports NUnit.Framework

<TestFixture()> _
Public Class DBAdapterTest
    Private m_SUT As DBAdapter

    <TestFixtureSetUp()> _
    Public Sub SetSut()
        m_SUT = New DBAdapter("C:\Users\Dome\Documents\Visual Studio 2010\Projects\SWE\lib\gs.db")
    End Sub

    <Test()> _
    Public Sub KannAnzahlDerKategorienAngeben()
        Dim AmountOfCates As Integer = 0

        AmountOfCates = m_SUT.ReadNumberOfCategories

        Assert.That(AmountOfCates, [Is].EqualTo(3))
    End Sub

End Class